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ABSTRACT 



Computer program portability is a measure of the effort 
vhich must be expended when transferring a program from one 
environment to another. Historically/ there have been 
several approaches to portability, but most have met with 
little success. The problems of portability are presented, 
along with techniques available to computer programmers to 
solve or alleviate tiose problems. Concurrent with this 
study, a portable preprocessor/editor was designed. The 
preprocesscr/editor was intended to give FORTRAN users a 
machine-independent means of character output and provide a 
simple editor for text manipulation. 
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I- introductio n 



Of oajcy concern to the computer industry in recent 
years has teen what K. M. Haite [Ref. 1] describes as the 
“Software Crises*" That is, the problem of reprogramming 
when the need arises to transport software from one machine 
to another must be gjven major consideration as a factor in 
computer program portability. The ease which the transfer 
is accomplished is measured by two factors, portability and 
adaptability. Portability can be defined as a measure of 
the ease with which a program can be transferred from one 
environment to anofher, while adaptability is a measure of 
ease with which a prpgram can be altered to fit differing 
user applications [Poole and Waite, 1973]. Although the 
differences between the two are not always well defined in 
practice, the major distinction lies in the above 
definitions. Where portability deals with environmental 
changes, such as word length, adaptability is concerned with 
changes in algorithm structure. 

A. RESEARCH GOALS 

This research Mas an initial study of program 
portability. It wafe intended to present a broad picture of 
the problems of software transferability and provide some 
insight to how those problems could be solved. The 
programming of a preprocessor/editor was undertaken to 
provide some insight to the problems of portability while 
providing a facility to allow machine-independent FORTRAN 
based software. 

B. TERMS AND DEFINITIONS 

The following terms and their definitigns are provided 
to give the reader a better understanding of the terminology 
used. 
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• Eoot£tr appi.nq 

As used here, bootstrapping is a process conmonly 
used in compiler implementation. The process is used uhen a 
compiler for a source language L (or a subset of L) is 
implemented cn a particular machine and the compiler is to 
be written in the language L. Gries [Bef< 2] offers the 
following explanation in the form of an exercise: 

Write a compj.ler in assembly language for a small 
subset L[ 0 ] of L. This subset should be small, so that it 
is easy to implement, but large enough to be used in the 
next step. The next step is to rewrite the compiler for 
Lf 0 ] in itself and check it out. Now, we try to 
"bootstrap” our way up to 1 in a series of steps as 
follows. At each step x, i = 1, ..., n, extend the 
compiler for Lfi-lJ to a compiler for a language L[i], by 
implementing other features of the desired language I. 

2- Jacro 

A macro gives the programmer the ability to refer to 
a specific cede seguence by mentioning a single predefined 
name. Waite £Bef. 3] defines macros as having a form 
similar to the following: 

HACBO NAbE (P 1 , P2 , Pn) 

Code 0ody 

END 

The words "MACBO" and "END” serve to delimit the 
definition, "NAHE." is the macro name, and "PI" through 
"Pn" are formal parameters. The code body is a series of 
lines which may contain instances of the formal 
parameters. 

Unlike . subroutine calls which occur at run time, macro 
expansion is the result of a preprocessing function. That 
is, when a macro call is recognized, actual parameters are 
substituted for formal parameters and the desired code is 
inserted at the point of the macro call. 

■3 • Irans lator 

McKeeman [fief. 4] defines a translator as a 
"function whose domain is a source language and whose range 
is contained in a target language." Simply stated, it is a 
mapping of one language into another. 
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There ate many factors which contribute to the prcblems 
of program portability. These factors may range from the 
manufacturer's unwillingness to produce compatible machines 
to the software community which, as stated by Fleiss, "has 
not provided the necessary guidelines ox standards for 
program design, coding and documentation" £Ref. 5]. Because 
of these factors, one finds it necessary to develop portable 
software. Two approaches to solving the problems of 
portability are discossed: MACRO processors and high level 
language programming* 
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II. MS BO gR OCESSORS 



Various approaches to portability through the use of 
macro processors havfi been attempted in the past. As early 
as 1961 an attempt to enhance portability was undertaken in 
a project known as SLANG. This project was somewhat 
similiar to another early approach, UNCOl, Both systems 
used translators and were based upon the premise that a 
translator can be wrg.tten in a single intermediate language. 
Poole and Waite [Ref. 6] attribute the failure of these 
systems to their "sioplistic" modeling. The variety of data 
bases and operators j.n existing languages necessitates a 
more comprehensive approach to abstract machine modeling. 
As Halpern [Ref. 7J points out, "with new computer 
applications being found daily, with the computer-using 
population growing at a still accelerating pace, and with 
that population .taking on an increasingly lay character, the 
notion of a universal language is indefensable today." 
Since the computer world has somewhat settled on a 
multiplicity of languages, the above statement seems to 
hold. Processors on the other hand, are generally tailored 
to fit one language necessitating a multitude of compilers. 
The need is for a software processor which can handle the 
variety of languages which exist today and is somewhat 
extendable to meet the needs of future languages. To this 
end, the macro processor has been developed. 

A. THE MCBIIE PROGRAMMING SYSTEM 

The Mobile Programming System is a translator system 
consisting of two levels, SIHCMP and SIAGE2. The system is 
a "powerful macro processor designed specifically as a tool 
for constructing machine-independent software" [Ref. 8]. 
The uniqueness of the Mobile Programming System is that 
unlike most apprpaches to portability through macro 
processors, it does not require an existing version of 
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itself. The system can be bootstrapped on most contemporary 
computing machines starting with the simplified translator 
called SIMCMP. 

1 - 

SlhChP (simple compiler) is a simple macro processor 
used to translate any source language which can be defined 
by macrcs with single character parameters. The SIMCMP 
algorithm consists of two distinct phases, macro definition 
and macro expansion. During the macro definition phase, all 
macros are read-rin using macro names or “templates” as the 
start of the definj.tion and an end-of-line flag to delimit 
the definition. Once the definition phase is complete, 
expansion begins. In the expansion phase, each line cf the 
source code is read. The source statement is matched with 
the predefined templates. If a match is found, the 
corresponding macro code body is punched out and the 
translator continues. If no template match is found for a 
line of source code, the code is treated as a statement in 
the base language. Reading a blank line from the source 
code terminates the process. 

2. ST^jEg 

The seconid level of the bootstrapping process is 
STAGE2, consisting of a more powerful processor written in a 
language capable of being translated by SIMCMP. The purpose 
of STAGE2 is to provide a means for implementing machine 
independent software. Software support of STAGE2 has been 
kept minimal and, as Waite £Ref. 8j pointed out, only five 
basic functions are required of the supporting machine. 

1. read one line 

2. detect end-of-file 

3. write one line 

4. write end-of-file 

5. rewind 

STAGE2 employs a scanner to recognize macro calls 
and isolate parameter strings. Template matching is used 
for recognition of mbcro calls. Where SIHCHP was a very 



12 



( 







f 



simple processor, ST&6E2 is a more powerful and flexible 
processor providing the user many factions. The macro 
facilities of SIAG£2 are similar to more powerful macro 
assemblers, and will be reviewed below for completeness. 

a. Storage 

STAGE2 provides three levels of storage: 
parameter storage, associative memory, and up to nine 
input/outfut files. 

Macros Jiave storage space for nine parameters, 
with parameter storage local to the macro body. That is, 
the parameters are available only to the code body cf the 
macro in which they were declared. Because nested macro 
cails are allowed, parameter values are saved during these 
calls. At the end of the code body, however, all parameters 
associated with that macro call are lost and not 
retrievable. 

The asspciative memory is similar to the COMMON 
statement in FOETHAN programming. That is, the associative 
memory area is glotal to the entire set of macro calls and 
provides a means for transferring information between 
macros. 

"By suitable processor functions the user can 
direct output generated by STAGE2 to any file on which 
writing is allowed. The input may be switched to any file 
on which reading is allowed" [Eef 8]. Multi-pass operations 
are possible since the input/output files can be used for 
temporary storage of intermediate text. 

b. Arithmetic Expression Evaluation 

Addition, subtraction, multiplication, and 
division can be performed by STAGE2. All arithmetic 
evaluations must be of integer type. That is, the operands 
must be either integers or symbols, where each symbol has an 
associated integer value stored in associative memory. 

c. Conditional and Loop Operations 

String equality and the relative magnitude of 
two expressions can be tested. As a result, an option is 
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available where the ability to skip a predetermined amount 
of code is available. The code body of the calling macro 
may be exited on this type of conditional branch. Looping 
within a macro call j.s also available. Similar in structure 
to a POBTBAN DO-Lpop, the calling macros code body may be 
duplicated more than once. 

As pointed out e^lier, the Mobile Programming System can 
be bootstrapped on a target machine without an existing 
version of itself. SIMCHP is defined in FOBTRAN because of 
the high availability of FORTRAN compilers. However, if a 
FORTRAN compiler is not available, SIMCHP is easily coded in 
assembly language on most computers. STAGE2 is written in 
FLOE (First Language Under Bootstrap) and can be compiled 
with SIMCHP. After STAGE2 has been implemented in its 
simplest form, it is “Bootstrapped" until the desired level 
is reached. As Poole and Haite £Ref . 1 ] point out, the 
resulting software is, therefore, tailored "tc the 
particular problem at hand" and its complexity is extended 
only "as the need arises." 

B. LIMP 

LIMP (Language Independent Macro Processor) [Ref. 7] is 
presently used to process text for eight different 
compilers. LIMP embodies the concept of a macro processor 
which is independent of assembly language. Eased upon the 
idea of string manipulation with parameter substit utuicn, it 
has the capacity to allow the programmer to alter the 
behavior of a specific compiler without redefining the 
entire language. 

Somewhat similar to the Mobile Programming System in 
operation, LIMP provj.des a much broader means of macro 
definition. Although still referred to as a template, the 
line which introduces the macro definition may be any 
arbitrary string of characters. A special parameter symbol 
is used to indicate the positions of parameters. Waite 
[Ref. 9] suggests ."this approach frees the system from any 
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arbitrary forsat restrictions of a particular language 
templates can be written in a form suited to the language at 
hand." Any code line which cannot be matched to a template 
is copied directly tp the output source without change. 

1 . Parameters 

A maximum of nine formal parameters may be specified 
within the macro code body. They are specified by their 
relative position in the macro definition template using the 
integers one through nine. Unlike the usual substitution of 
actual for formal parameters, LTHP allows several conversion 
types by indicating the desired subscript on the relative 
address of the parameter. The conversion digits describe 
the ways in which the actual parameter string may be used in 
each substitution. Hhen more than nine formal parameters 
are needed, a private tree may be used to store intermediate 
results, as described below. 

2. Ire^5 

Three types of trees are available in LIHP: private 

tree, symbol tree and template tree. As mentioned earlier, 
private trees may be used to store intermediate results when 
an excess of nine patameter strings are needed. Except for 
the macro code body, which is converted to list structure 
when defined, all input source code is considered in string 
form. It is, therefore, not possible to use string 
operations to make changes within the code body. If the 
user forsees the need to alter the code body of a macro, the 
code body can be stored in the private tree as a string. It 
is then possible to redefine this string as the code body of 
any template. 

The symbol .tree is used to store symbols which are 
either created by parameter calls or direct declaration by 
the user. In conjunction with this, any symbols added to 
the tree are automatj.cally given the current value of a 
built-in location counter or explicitly assigned by the 
user. 

The template tree contains the templates of all 
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defined aa^rcs. Nhen an input line is matched to a 
template, actual parameter strings are created and the 
associated macro code body is duplicated. The user may 
reenter the definition phase by using a special command to 
define another template and add it to the template tree. A 
blank line after the macro definition causes the system to 
return to the expansion phase. 

The LIMP system does, to some extent, solve the problems 
of languages being tailored to fit target compilers. It 
allows flexibility in software which is critical to the 
problems of transferability. W. M. Haite suggests that, 
with planned extensions, LIKP could far surpass the role of 
present macro processors and "would have the power of a 
syntax directed compiler" [Ref. 9]. 

Both the Mobile programming System and LIMP have enjoyed 
some degree of success. The Mobile Programming System has 
been implemented on eight different machines with a maximum 
of two man weeks required for i oplementation. As Poole and 
Haite point out, "it is not even necessary to have access to 
a running version of the system on another machine; a 
listing, tape or BCD deck is sufficient" [Ref. 1]. LIMP, on 
the other hand, was not designed with the same goals in 
mind. The degree of independence of LIMP is directly 
related to the availability of a HISP compiler on the target 
machine. HISP is currently available on the IBM 7094, 7040, 
GE 265, ENGLISH ELECTRIC KDP9, ELLIOT 803, EDSAC 2 and 
ATLAS 2 computer sys.tems. Once implemented, LIMP is capable 
of processing text for eight different compilers. As a 
result, text acceptable to LIMP attains some degree of 
machine independence-. 

Hhile the use of macro processors is a valid approach to 
portability, the development of standardized high-level 
language compilers opens the door to programming in a 
high-level language to attain a degree of portability. 
Software written in high-level languages have been 
reasonably successful in the field of trausf errability . 
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III* HIGH-LEVEJ. LANG UAGE PROGBA HMIN(j 

The use of high-level languages is evident in many 
attempts to enhance portability. The macro processors 
mentioned previousLy can themselves be highly portable 
systems if written in a widely available high level 
language. If this approach is not taken, the job of 
transferring the system deteriorates to one of reprogramming 
in assembly language. The alleviation is to code the 
applications programs by coding directly in universally 
available high-level languages. 

A. STANDARDIZATION 

The need for standardization of programming languages is 
evident. "This opinion is reflected by the existence of 
standards committees such as ANSI (American National 
Standards Institute) which have been organized for most 
popular languages" [Ref. 5]. Industry is very much 
concerned with maintaining a degree of standardization. 
"Presently, there nre COBOL precompilers that enforce 
management selected language usage constraints. Information 
Nanagement Inc., for instance, has UAGIC Standards Enforcer 
which notes use of management-^prescribed COBOL verbs. Arkay 
Computer Applications' MECCA flags about 200 management 
selected violations" [Ref. 5]. These standard enforcement 
packages are largely oriented toward maintaining uniformity 
of the listings for the sake of readability, but they can 
flag the use of any selected reserved words. In order to 
standardize programming languages, in 1969 the UNITED STATES 
NAVY issued OPNAVINSI 10462.8. This instruction explains 
the Navy's need for standardization and sets forth well 
documentated standards for the COBOL, FORTBAN, and JOVIAL 
programming languages. Standardization allows the coding of 
applications programs within the constraints cf a 
programming language^ The implementation of that program on 



17 










-*|f« 





any target aachine is dependent cn compiler availability and 
a Dinimuoi consideration of machine - dependent aspects, such 
as word size, I/O interfaces, character sets, and 
peripherals. The availability of standardized high-level 
language compilers is a problem which is rapidly decreasing. 
As early as 1966, the Navy attempted standardization by 
issuing SECNAVINST ^10462. 8 which demands that all new 
computer acguisitipns must specify COBOL and FORTRAN 
compilers as a mandatory requirement. The Navy realizes 
that certain high-level languages are better for different 
user requirements, ai^d, while it limits and standardizes the 
allowed high level languages, it provides a wide base for 
running its softyare; 

Standardization is lost when a language is extended to 
meet certain specialj.zed needs. It seems that even the most 
powerful high level language compilers are altered to 
provide extra features deemed necessary by implementors of 
the compiler. These features are added at the expense of 
the transferability pf programs coded for processing by the 
“improved” compiler/i In time, however, even these extended 
languages may become standardized. ANSI FORTRAN, for 
example, is an fextension of the original FORTRAN IV 
language. If extended languages are implemented, their 
compilers can be written to scan source code for factors 
which influence portability. “Whenever possible, compilers 
should flag usage of non-standard language features that 
they iaplement. WATFOR ... is an excellent example of 
fulfilling this f unction“[ Ref . 5]. 

One successful method of extending a language is to 
write a preprocesspr which converts the extended language 
into a standardized language-. MORTRAN, a language developed 
at Stanford University, is an example of high-level language 
extension without significant loss of portability. Written 
in ANSI standard FORTRAN IV, the HORTRAN processor can be 
implemented on a wide variety of machines,. The HCRTRAN 
processor translates the HORTRAN input text directly into 
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FORIBAN statements which can be compiled by the user's 
FOBIR&N CQ,mpilec- tlORTRAN's features include: 

free field format 
alphanumeric statement lables 
cpmments inserted anywhere in the text 
multiple assignments 
implicit looping and block structure 



1 . 

2 , 

3. 

4 . 
5 * 

6 . 



statements such as FOR-BI-TO, WHILE- 
OtNTIL, and IF-THEN- ELSE 

7» user defined macro-instructions 

8„ blocks of normal FORTRAN statements 
imserted in the text 

These extensions afford the FORTRAN user a powerful language 
which retains the qualities cf portability inherent in a 
standardized laaguage such as FORTRAN. 



B. STRDCIURED PROGRAMMING 



Programming in a standardized, widely available 
high-level language offers more than just a multiplicity of 
compilers. The programmer has the opportunity to enhance 
the transferability of software by using the techniques of 
structured programming. Structured programming can be 
thought cf as "the goal of evolving a program so that its 
final structure can be presented or described as a hierarchy 
of tasks or blockis" [Ref. 10]. Because those areas of 
computer software which retain machine dependencies must be 
altered when a transfer of software is to be affected, it is 
beneficial tc the personnel performing the transfer to 
easily identify thofee dependencies. Structured, or modular 
programming, makes i± "possible to study the system one 
nodule at a time" [Ref. 5] and therefore increases the ease 
of comprehension of the system. This type of modular 
programming can be used to segregate those areas in the 
software which may contain machine dependencies. Knowledge 
of the entire system or unrelated modules is, therefore, not 
required to accomplish the task of making the needed 
changes. 
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FOETBAN is an excellent example of a high-level language 
which can he easily modularized. "The ability to divide 
machine/systeo dependent and independent attributes into 
separate entities via sub-programs greatly enhances the 
transferability of pxograms" [Bef. 5], The compiler for 
INTEL'S PL/H lanr[uage was written in ANSI standard 
FOETBAN [Bef. 11 J. Because the compiler was written using 
the concepts of structured programming, machine dependencies 
were easily isolated from the remainder of the system. As a 
direct result of the modular design and standardized base 
language, PI/U has been easily implemented on eight 
different machines with little or no difficulty. 
Input/output file names are contained within two subroutines 
and can easily be accessed for change. Once implemented on 
a specific ccmputing machine, sections of the PL/M compiler 
may be accessed to increase efficiency. This has been 
demonstrated on the IBM System/360. A forty percent 
decrease in compile tine was achieved by replacing the 
FOBTBAN method of shifting with an assembly language shift 
and mask operation. This adjustment, plus the 
implementation of an assembly language input/output package 
and the use of thfe FOBTBAN H optimizing complies, allowed 
compilaticn of PL/M programs in less than half the time 
required by the fipst version. The total effort expended to 
facilitate these changes was twenty-four man hours. 

The advantages of coding in a standardized language 
similar to FOBTBAN are apparent. As Hamlet [Bef. 12] points 
out, "only schemes based on ANSI FOBTBAN really move easily 
among different computers." As discussed earlier, the 
Mobile Prcgrammiqg System is written partly in ANSI FOETBAN. 
The portability of the entire system is somewhat dependent 
upon the ability to implement SIMCMP on the target computer. 
As a result of the variety of portable software which has 
been written, an ANSI FOETBAN based preprocessor/editor was 
written with the qoal of achieving seme degree of 
portibility. 
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I?, PBE DITOR 



PREDIlOfi (PRepro.cessor/EDITOR) was impleoiented in ANSI 
FORTRAN using the concepts of structured programming. This 
was considered to be a viable approach to ' machine 
independent software. PREDITOR is a preprocessor/editor 
which is capable of processing a small super-set of FORTRAN, 
called FORTRAN+, and allows changes to existing programs 
with a simplified text editor. 

As an implementation language, FORTRAN is deficient in 
some areas. For example, ANSI FORTRAN does not provide a 
string data type. Some aspects of FORTRAN, such as the 
COHHON statement for representing global variables, have 
caused many ma^ hours of work when a program change is 
necessary. FORTRANi- attempts to solve some of the 
inadeguacies of character manipulation inherent in FORTRAN 
and make the alteration of large software packages an easier 
task. In addition, the text editor section of PRFDITOR 
includes four useful editing functions. 

1. insert a line of code 
2- delete a line or sequence of code 
3. cppy a predefined sequence of code 
4- sequence the source file 

The above funciions are invoked using a number of 
•’control toggles," a patch file containing desired changes, 
and a user’s sequenced source file. 

A. INDEPENDENT ASPECTS 

Because of the availability of standard FCBTBAN 
compilers, PREDITOR offers a highly portable package. 
Structured programming and machine- independent character 
representation allows the data structures and internal logic 
to be transparent to the user and target machine. The 
nodular design has also allowed for the isolation of 
input/output processing. This results in a flexible system 
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for user reassignment of peripheral devices, particularly in 
the program transfer stage. Word size varies widely from 
machine to machine, and thus must be considered an important 
factor in portability. PREDITOR uses machine word size to 
its advantage. By packing applicable input data, memory 
requirements are mj.nimized. This allows existing software 
to be preprocessed for use on target machines with different 
word lengths while iminimizing machine storage requirements. 

B. DEPENEENT ASPECTS 

PREDITOR contains some machine dependencies. The data 
which PREDITOR must access during execution is packed 
according tc host machine word size. If PREDITCR is 
transferred to another machine, this data must be repacked 
according to the new machine word size. PREDITOR itself can 
be used to process the appropriate statements and provide a 
copy of the reformatted data. The syntax tables which are 
vital to the compiler portion of PREDITOR are also machine 
dependent and can be reconstructed for the host machine. 

Special characters which trigger PREDITOR functions may 
conflict with predefined uses of those characters in 
existing target machines. For example, the dollar sign is 
used as a comment indicator in the XDS Sigma 7. The 
reserved dollar character can easily be changed in any 
implementation. 

C. METHODS OF TRANSFER 

Prior to transfer to a new environment, certain 
dependencies must be accounted for. Word size dependent 
syntax tables and packed output data must be replaced with 
tables and data generated for the target machine. 

Input/output files presently reflect the file numbers of 
the IBM System 360. These file numbers may be redefined to 
meet user requirements or existing system file definitions. 
All areas which may need to be altered are clearly marked in 
the source listing of PREDITOR. 

If a conflict involving the use of special characters 
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which trigger PRSOITOB functions exists, fBEDlTOB must be 
altered. An alternate character must be defined and 
iiplemented in the sfstem. 

D. OPEBAIIMG PBOCEDUBES 

PBEDIIOB is a one pass system. During the pass, the 
source program is scanned and all improperly formed 
statements are detected. A listing of the source program 
can be obtained and errors are listed by line number. Error 
messages take the form: 

««««* error (X) NEAR LINE y 

***** Brief explanation of error 

The number x corresponds to the error number and y is the 
line number where the error occured. The line which 
immediately follows gives a brief explanation of the 
particular error message. See Appendix C for a complete 
list of error messages. 

File numbers used in PREDITOR, along with the 
corressponding device types are listed in Appendix D. These 
I/O file numbers diay be set prior to execution or during 
execution by using available control switches. 

PREDITOR begins by reading a record from the input file. 
The PREDITOR processor translates the FORTRAN+ input text 
directly to FORTRAH statements, which are then compiled by 
the user's FORTRAN compiler.. $$ Control switches are 
usually set at this time by the user. If not, control 
switches are set to default values. If the edit mode is not 
selected, the source file will be preprocessed as is. If 
editing is desired, .GOFERS will merge the patch deck and the 
source file and prpcess it normally. Figures 1 and 2 show 
typical patch deck and source file composition. When the 
nines cards are read, the operation is complete. The 
resulting merged file is then ready to be compiled from the 
temporary storage area. 
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$$ Control Switches 



(these consist of either control toggles 
or control switches and are used as desired.) 



$$PATCH (fiequired) 



$$ Statements 



(These cards are used to delete or add cede 
to the source file.) 



99S99999 .(nines card required4) 

Figure 1 

A Typical Preditor Patch File 



$$xx Statements (if desired) 

(These are used in conjunction with 
the $ COPY command) 

$$ SOURCE (Required) 

$ Command Statements 



(These include $ OUTPUT, $ COPY and 
$ APPFND VERSE.) 



(nines card required) 99999999 



Figure 2 

A Typical Preditor Source File 
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E. $$ SIAIEHENTS 

The $$ Statements are used to initialize PBEDITCB and 
alter the predefined states of control toggles. $$ SOUBCE 
marks the beginning of the source file. All statements 
following the $$ SOUEtCE are considered as part of the 
source file until a “nines card” (99999999 in columns 73-80) 
is detected. 

The $$ PATCH incicates the beginning of the patch deck. 
The patch deck defines additions and deletions to the source 
file. All statemenrts following the $$ PATCH are considered 
as part of the patch deck until a nines card (99999999 in 
columns 1-8) is detected. Patch deck cards are cf two 
forms: 

1. insert a card of code 
X/CXXXXXX CODE BODY 

2. delete a body of code 
x]cxxxxxx*yyyyyyyy 

The xxxxxxxx field is in columns 1-8 and indicates that 
the CODE EODY (columns 73-80) is to be inserted prior to a 
source file record of equal or greater sequence number. If 
a star (*) appears in column nine, the records to be deleted 
begin with sequence number xxxxxxxx and end with sequence 
number yyyyyyyy inclusive. 

$$xx statements are used to define a portion of text 
which is to be copied into the executable source file. The 
dollar signs ($$) are placed in columns 1 and 2 with the xx 
field in columns 3 aud 4. The xx field is any integer 
between 1 and 99 and represents all text which follows until 
another dcllar sign is found in column 1. This text may be 
copied into the new source file with the call $ COPY xx. 
This allows the user to make changes to statements such as 
FOBIRAK COHtlON, whj.ch may be used frequently throughout a 
program. To facilitate the change, the user need only make 
the change in the definition stage as mentioned above. All 
$$xx statements and their associated text are physically 
placed directly before the $$ SOURCE card. 
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other control switches take two forms; control toggles 
and control parameters. Toggles take on the values 1 and 0 
(true or false ) , while parameters take on appropriate 
values. 

Control switches are specified by typing a $$ in columns 
1 and 2 , and a switch name starting in column 3 (only the 
first character of the switch name is significant) . The 
switch name is follpwed by an equal sign (=) and an integer 
value. Ccntrol switches are listed in Appendix B. 

E. $ COHBAND STATEMENTS 

The $ Command Statements are used freely within the 
source file after the $$ SOURCE card. These statements are 
part of the processor portion of PBEDITOE. PRIDITOR 
translates $ Commaad Statements to standard FORTRAN 
subroutine calls. 

The $ OUTPUT allows output of strings and integers. 
The use of the cpncatenation feature within the OUTPUT 
statement provides for a continuous output of strings and 
integers. A dollar sign ($) is placed in column 1 of the 
source file, followed by at least one blank, with the 
remainder cf the statement being free format. The OUTPUT 
statement takes the following form: 

$ OUTPUT ( ) 

All information to be written out is contained between the 
two parentheses. The statement must terminate with a right 
parenthesis prior to column 73. 
a. Strings 

Strings are delimited by the single quote (•) . 
All characters which appear between two quotes are 
considered part of the string. The use of two adjacent 
quote marks inside the string results in the output of a 
single quote. Although the maximum length of text that one 
OUTPUT statement can process is 64 characters, the output of 
a longer text can be performed using the concatenation 
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feature in ccnjunctipn with as many OUTPUT statements as are 
needed. Concatenation may be used to suppress dumping of 
the output buffer. This allows strings or integers which 

follow to be placed the current buffer as shown in the 

following example. 

$ OUTPUT (*THIS IS A TEST •//) 

$ OUTPUT {//'STBING') 

The output would appear as THIS IS A TEST STfilNG. 
b. Integers 

Integers may be represented as variable names or 
constants. Four bases are available; binary, octal, 
decimal, cr hexadecitmal. A variable field width is also 
available with the option of blanks or zeros to fill out the 
field. To output an integer variable or constant, the 
statement must be of the form; 

(X) nnnnnn ; y 

The value x in parentheses is optional and specifies a field 
width. If ncne is specified, a default width of 5 is used. 
If a negative value is given, the fieid is padded with 
blanks Instead of zexos. The nnnnnn field is the- variable 
or constant field, jwhile the y represents the radix desired 
and is also optional, but defaults to base 10 if none is 
specified. All three components may be either integer 
values or variables with integer values. The negative 
concatenation option (/”/) can be used effectively in 
conjunction with the field width to produce a desired 
output. A /-/ will cause all leading blanks in a field 
width to be deleted. This allows integers to be 
left-justified when concatenated with strings cr other 
numbers as shown in the following example. 

$ OUTPUT ('THE VALUE OF K IS */-/(- \0) Kl \Q) 

The output would appear as THE VALUE OF K IS 5 where K has 
the value 5. 

l_COFY 

The SCOPY statement causes the text associated with 
the statement to be inserted at that point in the source 
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code. The statement must take the form; 

$ COPY XX 

The dollar sign ($) is placed in column 1, followed by at 
least one blank, with the remainder of the statement free 
format. The number pcx is any integer between 1 and 99- 
3. S APPf NP VERSE 

The $ APPEND VEfiSE has the form: 

$ APPEND VEBSZ 

The dollar sign must again be placed in column 1, followed 
by at least one blank, with the remainder of the statement 
format free. This causes the vector VERSE, which contains 
the packed output data, to be copied into the new source 
file at this point. The associated FOBIRAN equivalence 
statements will be built at this time. 
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V. SUMMER I 



Uithio the areas discussed, each effort made to increase 
the portability of software has offered some distinct 
advantages. Both the Mobile Programming System and LIMP are 
macro processing systems which were developed for 
constructing machine independent software, but attack the 
problem with different concepts in mind. While the Mobile 
Programming System was designed to be transferred with the 
software, LIMP must meet this goal by processing programs at 
those installations which support the language WISP. The 
Mobile Programming S.ystem is capable of being bootstrapped 
on most computing machines to a level which best meets the 
needs of the software to be processed. LIMP, on the other 
hand, was designed to translate the software into cne of 
eight different languages. Although LIMP itself is bound to 
those systems which support WISP, the resulting software may 
be transferred to any machine which supports one of those 
eight languages. 

The use of high-level language programming has also made 
a significant contribution to software portability. 
Standardization of programming languages and the attempt by 
many software manufacturers to produce a product which is 
eas ill understood and modified, has made transferability of 
software a much easier problem to solve. All methods 
discussed have experienced a degree of success. There is, 
however, another question which must be considered when the 
subject cf portability arises. That is, what is the 
efficiency cf the final product. Because most systems 
designed for transferability are coded with the concept of 
structued programming in mind, critical routines can be 
singled cut and recoded in assembly language to increase 
efficiency. Although there are currently no comparative 
studies of efficiency of the macro processor systems 
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meutioaed, Waite [Ref. 6] suggests that the "effort 
involved in this recoding is miniscule compared with that 
involved in hand-^coding the entire processor." The success 
of this metbcdology 4-s evident in the implementation of PL/H 
on the I£tl System 360. With a minimum amount of alteration, 
efficiency was increased by approximately forty percent. 

In the final analysis, the efficiency of the systems and 
methodologies used vj.ll be determined by the degree of 
development in those areas. The mobility associated with 
macro processors and high-level languages, however, has been 
demonstrated as a viable tool for implementation of 
programming languages on a variety of computing machines. 
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APPENDIX A: FOEHAL DEFINITION OF PEEDITOR 



1 . 

2 . 

3. 

4. 

5. 

6 . 

7. 

8 . 

9. 

10 . 

11 . 

12 . 

13, 

14, 

15. 

16. 

17. 

18. 

19. 

20 . 

21 . 

22 . 

23, 

? 4 . 

25, 

26. 

27. 

28. 



<PB06BAB> <STATEBENT LIST> 



<SIATEBENT LIST> ::= <STATEMENT> 

I <STATEBENT LISIXSTATEHENT> 

<SIATZKENT> :;= iCOUTPUT STATEBENT> 

I <APPEND STATEMENT> 

I <COPI STATEM£NT> 

<OUTPUI STATEMENT> : := <ODTPUT HEAD> ) 

<APPEND STATEMENT> : ;= <APPENDXSUBJECT> 

<COPY STATEMENT> ; ;= <COPYXNU£dBER> 

<OUTPUT HEAD> <ODTPOT> ( 

<OUTPUT HEADXSrRING> 

<OUTPUT HEADXCONCAT> 

<OUTPUT HEADXNCONCAT> 
<OOTjPOT HEADXCONOUT CALL> 

<CONOUT CALL> : <CONOUT STATEMENT> 

I <CONDUT CALLXfiADIX> 

<CONCDT STATEMENT> : ;= <IDENTIFISR> 
<NUMBEB> 

<FIELD WIDTHXIDENTI?IE2> 
<FIE1D WIDTHXNUMBEB> 

<FIELD ttIDTK> ( <NUMBEB> ) 

<RADIX> <RADIX HEADXIDENTIFIEE> 

I <EADIX HEADXNUHBEB> 



<BADIX HEAD> : := : 

<COPY> COPY 

<OUTPOT> ;:= OUTPUT 
<APPEND> APPEND 

<SUBJECT> VJBSE 
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- -t*, . 



,;=j 




S witch Nam e 

$$APATCH=n 

$$BSEQOENCE=n 

$$EZLTA=n 

$$£«ABGIN=n 

S$HHDSIZ£=n 

$$IHPOT=n 

$$MEB6E - 
$$OOTPUT=n 

$$PBINT 

$$BUABGIM=n 

$$SEQUEHCE 

$$WOBDSIZE=n 

NOTE: All in 

output 



APPENDIX B: PBEDIIOB CONTBOL TOGGLES 



Dsg „ . Def ault 

The patch deck input file number = n 1 

BegincEequence numbering at n 25 

Sequence number increment = n 25 

Set the output line width to n 120 

characters. 

Host machine wordsize = n 32 

Switch to file n for subsequent 1 

input ;(see file numbering) . 

Edit mode: T or F 0 

Write subsequent output lines to 1 

file n 

Output lines to the printer: T or F 1 

Logical record size = n 80 

Beseguence the source file: T or F 0 

Target machine wordsize = n 32 



ut files are maximum of 80 characters, and the 
files cannot exceed 120 characters. 
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APPENDIX C: ERBOE MESSAGES 



Error 

N umber 

1 



2 

3 



4 



5 



6 

7 



8 



Message 



Illegal symbol pair. The symbols printed cannot 
appear in a valid statement. This error may have 
been caused by a previous error in the program. 

Parse stack overflow. Simplify the statement of 
declare a larger parse stack and recompile. 

Table overflow. Error may be result of too many 
variables in use at one time. Either simplify the 
OUTPUT statement or increase the varc size ana 
recompile. 

Improperly formed statement. The statement above 
is improperly formed. Check formal BNF for def- 
inition and usage. 

Incorrect fprmat for concatenation used. Proper 
format is: 

// J Append to the current output buffer. 

/-/ : Append to the current output buffer and 
delete the leading blanks. 

String length exceeds allowable limits. Use 
shorter string length combined with concatenation. 

Variable exceeds FORTRAN limits. Variable 
listed below is greater than six characters in 
length. Rename the variable. 

A $$CCNTBOL statement is improperly formed. 

Check all CONTROL statements to insure 
proper format. 

1$ SOURCE 
$$ PATCH 

$$CCNTROL TOGGLE 
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APPENDIX D; FILE DEFINITIONS 





INPUT 








OUTPUT 




NUMBER 


DEVICE 


UNIT 


♦ 

♦ 


NUMBER 


DEVICE 


UNIT 


1 


CABDBDR 


5 


♦ 

if 


1 


PRINTER 


6 


2 


TELTYPE 


4 


♦ 


2 


TELTYPE 


4 


3 


PAPTAPE 


6 


♦ 

if 


3 


PUNCH 


7 


4 


MAGTAPE 


7 




4 


MAGTAPE 


8 


5 


ESKFILE 


8 


♦ 


5 


DSKFILE 


9 


6 


DSKFILE 


9 


♦ 

A 


6 


DSKFILE 


10 


7 


available: 


10 




7 


PAPTAPE 


11 



NOTE: Unit numbers aav be altered to fit user reguirenients 

by accessing subroutines HDTEXT and KfilTEL. These 
are the only references to these unit numbers. 
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INTEGER FUNCTION GNC(IQ) 
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StBROUTINE FORM (LC, CHARS, START, FI NISH tLENGTI-,ONPAC) 
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« THE OLTPLT BUFFER. 
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C <CONOUT STATEMENT> : <F I £L0_ W IDTH> <IDENTIFIER> 
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LCGICAL FUNCTION NINES(K) 

INTEGER PAeUFF(OO) ,SGBUFF(80) ,SCNUM(8) , PANUK(8) »PASNUM( 8) , MERGE 
LCGICAL INSERT, FAULT 

CCMMoN /MERGES/ PABUFF, SOBUFF , SONUM, PANUM , PASNUM, MERGE , INSERT, 
FAULT 
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0CC CCNTINUE 

CLTPUK •=!'«««» IMPROPERLY FORMED $ICCNTROL STATEMENT* 
CALL FOPM(0,TEXT , 140 , 1A8 , A3 , . TRUE. ) 

CALL WRITEL(O) 

9S9 RETURN 
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